Tabsheet bez zalozek
Otázka od: Matejcek Petr
29. 6. 2004 19:55
DD,
pouzivam TabSheet ale potreboval bych po spusteni programu zalozky
skryt a prepinat se jen pomoci mych tlacitek nekde bokem
poradil by pls nekdo jak ?
diky PM
Odpovedá: Jiri Foldyna
29. 6. 2004 21:39
Ahoj,
napr. ve FormCreate v cyklu nastavit pro kazdy tabsheet TabVisible na false.
for i := 0 to PageControl1.PageCount - 1 do
begin
PageControl1.Pages[i].TabVisible := false;
end;
Zdravim
Jiri Foldyna
mailto:jiri.f@avizo.cz
> pouzivam TabSheet ale potreboval bych po spusteni
> programu zalozky
> skryt a prepinat se jen pomoci mych tlacitek nekde bokem
> poradil by pls nekdo jak ?
Odpovedá: Zdenek Brejsa
30. 6. 2004 6:07
> napr. ve FormCreate v cyklu nastavit pro kazdy tabsheet TabVisible na
false.
>
> for i := 0 to PageControl1.PageCount - 1 do
> begin
> PageControl1.Pages[i].TabVisible := false;
> end;
>
> Zdravim
>
> Jiri Foldyna
> > pouzivam TabSheet ale potreboval bych po spusteni
> > programu zalozky
> > skryt a prepinat se jen pomoci mych tlacitek nekde bokem
> > poradil by pls nekdo jak ?
Jestli mas aspon D6, pak staci nastavit TabVisible na False v designu. Od D6
se skryji zalozky uz pro navrh a tedy vidis celou plochu. A kdyz nastavis
styl tlacitek na Flat, tak zmizi i oramovani.
Zdenek Brejsa - HJ-SOFT
Odpovedá: Matejcek Petr
30. 6. 2004 7:02
Asi jsem to spatne napsal TabVisible samozrejme znam a pouzivam
potreboval jsem, aby obsah byl videt (pomoci TabVisible si necham
zobrazenu jen jednu zalozku ) a chci nezobrazovat pouze to ousko nahore
Zdenek Brejsa napsal(a):
>Jestli mas aspon D6, pak staci nastavit TabVisible na False v designu. Od D6
>se skryji zalozky uz pro navrh a tedy vidis celou plochu. A kdyz nastavis
>styl tlacitek na Flat, tak zmizi i oramovani.
>
>Zdenek Brejsa - HJ-SOFT
>
>
>
>
>
>
Odpovedá: Zdenek Brejsa
30. 6. 2004 7:20
Ted tomu asi nerozumim: kdyz nechci videt ousko nastavim TabVisible na
False, kdyz chci ukazat stranku nastavim PageControl.ActivePage (nezavisle
na TabVisible)
> Asi jsem to spatne napsal TabVisible samozrejme znam a pouzivam
> potreboval jsem, aby obsah byl videt (pomoci TabVisible si necham
> zobrazenu jen jednu zalozku ) a chci nezobrazovat pouze to ousko nahore
>
> Zdenek Brejsa napsal(a):
>
> >Jestli mas aspon D6, pak staci nastavit TabVisible na False v designu. Od
D6
> >se skryji zalozky uz pro navrh a tedy vidis celou plochu. A kdyz nastavis
> >styl tlacitek na Flat, tak zmizi i oramovani.
> >
> >Zdenek Brejsa - HJ-SOFT
Odpovedá: Matejcek Petr
30. 6. 2004 8:22
zkuste si dat do TabSheet.TabHeight = 1 no a ja bych potreboval jeste
min jenze 0 neudela to ze ousko se skryje ale da tam default
nebo jeste uplne jinak potrebuju mit na formulari nekolik stranek
(ale vzdy zobrazenou jen jednu ) a prepinat je podle behu programu
rekneme treba ze bych mel na hlavnim formulari najaka tlacitka a stejny
pocet panelu a pri s tisku tlacitka se zobrazi prislusny panel a
ostatni budou skryty
no a ty panely by byly umisteny tak aby se vsechny zobrazovaly na
stejnem miste
tj funkcni by to bylo user nic nepozna ale me se s tim bude blbe
pracovat protoze budu mit vsechny panely na sobe a budu si je muset
posouvat a hledat ten pravy
tak jsem si myslel ze pouziju TabSheet a skryju ty ouska a ono to nejde
nebo je na to nejaka lepsi komponenta?
PM
Zdenek Brejsa napsal(a):
>Ted tomu asi nerozumim: kdyz nechci videt ousko nastavim TabVisible na
>False, kdyz chci ukazat stranku nastavim PageControl.ActivePage (nezavisle
>na TabVisible)
>
>
>
>
>
>
>
>
>
Odpovedá: Tomas Fajman
30. 6. 2004 8:27
Ja to tak mam taky a pouzivam na to komponentu notebook
"Matejcek Petr"
<konference@crhov Komu: delphi-l@clexpert.cz
.komfi.cz> Kopie:
Odeslal: Predmet: Re: Tabsheet bez
zalozek
delphi-l-owner@cl
expert.cz
30.06.2004 08:59
Odpovezte prosim
uzivateli
delphi-l
zkuste si dat do TabSheet.TabHeight = 1 no a ja bych potreboval jeste
min jenze 0 neudela to ze ousko se skryje ale da tam default
nebo jeste uplne jinak potrebuju mit na formulari nekolik stranek
(ale vzdy zobrazenou jen jednu ) a prepinat je podle behu programu
rekneme treba ze bych mel na hlavnim formulari najaka tlacitka a stejny
pocet panelu a pri s tisku tlacitka se zobrazi prislusny panel a
ostatni budou skryty
no a ty panely by byly umisteny tak aby se vsechny zobrazovaly na
stejnem miste
tj funkcni by to bylo user nic nepozna ale me se s tim bude blbe
pracovat protoze budu mit vsechny panely na sobe a budu si je muset
posouvat a hledat ten pravy
tak jsem si myslel ze pouziju TabSheet a skryju ty ouska a ono to nejde
nebo je na to nejaka lepsi komponenta?
PM
Zdenek Brejsa napsal(a):
>Ted tomu asi nerozumim: kdyz nechci videt ousko nastavim TabVisible na
>False, kdyz chci ukazat stranku nastavim PageControl.ActivePage (nezavisle
>na TabVisible)
>
>
>
>
>
>
>
>
>
Odpovedá: Zdenek Brejsa
30. 6. 2004 8:45
> nebo jeste uplne jinak potrebuju mit na formulari nekolik stranek
> (ale vzdy zobrazenou jen jednu ) a prepinat je podle behu programu
> rekneme treba ze bych mel na hlavnim formulari najaka tlacitka a stejny
> pocet panelu a pri s tisku tlacitka se zobrazi prislusny panel a
> ostatni budou skryty
> no a ty panely by byly umisteny tak aby se vsechny zobrazovaly na
> stejnem miste
takhle TabSheet (PageControl) pouzivam a nemam problem ...
na formular dam panel s tlacitky (Align = Bottom) PageControl (Align =
Client)
na PageControl (styl tlacitek na Flat) nekolik TabSheet s TabVisble na
False. Prepinam se mezi nimi pres PageControl.ActivePage jak v designu, tak
pres tlacitka v runtime ... Kde je problem ?
Zdenek Brejsa - HJ-SOFT
Odpovedá: Zdenek Brejsa
30. 6. 2004 8:40
>
> Ja to tak mam taky a pouzivam na to komponentu notebook
>
Ale pozor, formular na kterem je notebook, se neda dedit.
>
> >Ted tomu asi nerozumim: kdyz nechci videt ousko nastavim TabVisible na
> >False, kdyz chci ukazat stranku nastavim PageControl.ActivePage
(nezavisle
> >na TabVisible)
Odpovedá: Milan Tomes
30. 6. 2004 9:16
Tak to by me tedy opravdu zajimalo proc. Ja mam takoveto formulare 2 a
pouzivam je jako predky bez nejmensich problemu.
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner@clexpert.cz]On Behalf Of Zdenek Brejsa
> Sent: Wednesday, June 30, 2004 9:36 AM
> >
> > Ja to tak mam taky a pouzivam na to komponentu notebook
> >
> Ale pozor, formular na kterem je notebook, se neda dedit.
Odpovedá: Jiri Foldyna
30. 6. 2004 9:19
> Asi jsem to spatne napsal TabVisible samozrejme znam a pouzivam
> potreboval jsem, aby obsah byl videt (pomoci TabVisible si necham
> zobrazenu jen jednu zalozku ) a chci nezobrazovat pouze to
> ousko nahore
Property TabVisible urcuje, jestli je videt ousko, ne jestli je viditelny
TabSheet. TabSheet v runtime zobrazis bud pomoci PageControl.ActivePage :=
TabSheet1 (TabSheet2..n) nebo pomoci PageControl.ActivePageIndex := 0
(1..n-1). Ja si ouska nechavam v designu viditelna, lip se mi zalozky
prepinaji, a skryvam je az ve FormCreate, ale to je vec zvyku.
Zdravim
Jiri Foldyna
mailto:jiri.f@avizo.cz
Odpovedá: Zdenek Brejsa
30. 6. 2004 9:27
> Tak to by me tedy opravdu zajimalo proc. Ja mam takoveto formulare 2 a
> pouzivam je jako predky bez nejmensich problemu.
>
hmm ... taky nevim, ale schvalne jsem si to znovu zkusil a porad to pri
pokusu dedit hlasi
"Error creating form: Cannot inherit 'Form1'. Constains a
component 'Notebook1' that does not support inheritance."
Zdenek Brejsa - HJ-SOFT
Odpovedá: Zdenek Brejsa
30. 6. 2004 9:20
> > Asi jsem to spatne napsal TabVisible samozrejme znam a pouzivam
> > potreboval jsem, aby obsah byl videt (pomoci TabVisible si necham
> > zobrazenu jen jednu zalozku ) a chci nezobrazovat pouze to
> > ousko nahore
>
> Property TabVisible urcuje, jestli je videt ousko, ne jestli je viditelny
> TabSheet. TabSheet v runtime zobrazis bud pomoci PageControl.ActivePage :=
> TabSheet1 (TabSheet2..n) nebo pomoci PageControl.ActivePageIndex := 0
> (1..n-1).
>Ja si ouska nechavam v designu viditelna, lip se mi zalozky
> prepinaji, a skryvam je az ve FormCreate, ale to je vec zvyku.
To ma ale za nasledek jiny design pri navrhu a v runtime - o ty ouska
prubude dole volne misto
Odpovedá: Jiri Foldyna
30. 6. 2004 9:41
> > Property TabVisible urcuje, jestli je videt ousko, ne
> jestli je viditelny
> > TabSheet. TabSheet v runtime zobrazis bud pomoci
> PageControl.ActivePage :=
> > TabSheet1 (TabSheet2..n) nebo pomoci
> PageControl.ActivePageIndex := 0
> > (1..n-1).
>
> >Ja si ouska nechavam v designu viditelna, lip se mi zalozky
> > prepinaji, a skryvam je az ve FormCreate, ale to je vec zvyku.
>
> To ma ale za nasledek jiny design pri navrhu a v runtime - o ty ouska
> prubude dole volne misto
To vadi jen pokud ten PageControl nemuze v runtime menit velikost. To
pouzivam jen u univerzalnich dialogu, kdy pri FormCreate nastavuji i
velikost formu, a tam to osetrim.
Zdravim
Jiri Foldyna
mailto:jiri.f@avizo.cz
Odpovedá: Milan Tomes
30. 6. 2004 9:37
Omlouvam se - ted jsem si uvedomil:
a) pouzivame komponentu TdxPageControl
b) pouzivali jsme TPageControl a ne TNotebook
S pozdravem
Milan Tomes
P.S.: Mas nejaky specialni duvod pro pouzivani TNotebook ???
> [mailto:delphi-l-owner@clexpert.cz]On Behalf Of Zdenek Brejsa
> Sent: Wednesday, June 30, 2004 9:52 AM
>
> > Tak to by me tedy opravdu zajimalo proc. Ja mam takoveto formulare 2 a
> > pouzivam je jako predky bez nejmensich problemu.
> >
> hmm ... taky nevim, ale schvalne jsem si to znovu zkusil a porad to pri
> pokusu dedit hlasi
"Error creating form: Cannot inherit 'Form1'.
> Constains a
> component 'Notebook1' that does not support inheritance."
Odpovedá: Zdenek Brejsa
30. 6. 2004 9:46
> Milan Tomes
>
> P.S.: Mas nejaky specialni duvod pro pouzivani TNotebook ???
uz ne, ale v D4 PageControl neschovaval v designu ouska a prekryvajici
panely jsou neprakticky pri navrhu. Takze, pokud nebylo treba dedit, jsem
pouzival TNotebook. Tot vse 
Odpovedá: Cermi
13. 8. 2004 0:47
Me dedeni TNotebooku funguje 
Cermi
ja.cermi@centrum.cz
ICQ 159971304
http://cermi.wz.cz
----- Original Message -----
From: "Zdenek Brejsa" <prog@hjsoft.cz>
To: <delphi-l@clexpert.cz>
Sent: Wednesday, June 30, 2004 9:35 AM
Subject: Re: Tabsheet bez zalozek
> >
> > Ja to tak mam taky a pouzivam na to komponentu notebook
> >
> Ale pozor, formular na kterem je notebook, se neda dedit.
>
> >
> > >Ted tomu asi nerozumim: kdyz nechci videt ousko nastavim TabVisible na
> > >False, kdyz chci ukazat stranku nastavim PageControl.ActivePage
> (nezavisle
> > >na TabVisible)
>
>
>
>